###########################################################################
# $Id: conceptFieldConverterHTML.p 28 2009-05-09 08:25:28Z donbeave $
###########################################################################

@CLASS
conceptFieldConverterHTML

@USE
concept/converters/conceptFieldConverter.p

@BASE
conceptFieldConverter

@OPTIONS
locals

#----- Constructor -----

@create[hshOptions]
  ^BASE:create[$hshOptions]

  ^pfAssert:isTrue(def $_createOptions.tidy)[Tidy object not specified.]

  $self._tidy[$_createOptions.tidy]

#----- Public -----

@onSelect[altData]
  $result[$altData]

@onUpdate[altData]
  $result[]
  ^if(def $altData){
    $result[^taint[as-is][^TIDY.parse[xhtml;$altData]]]
  }

#----- Properties -----

@GET_TIDY[]
  $result[$self._tidy]
